ISNUMERIC - True Or False

IsDate - True Or False

Trim("   Dad   ") - "Dad"

Val("I Am 13" - "13"

Format(Date, ******)

dddd  the day, ie Monday 
ddd  the short day name, ie Mon 
dd  two-digit day number, ie 05 
d day number, ie 5 or 14 
mmmm  the month, ie October 
mmm  the short month name, ie Oct 
yyyy  the year, ie 2000 
yy  the short year, ie 00 
dd/mm/yyyy  plain date, ie. 01/03/2000 

Format(Time, ******)

am/pm  returns am or pm 
hh  returns the two-digit hour number, ie 04 
h  returns the hour number, ie 4 or 11 
mm - returns the two-digit minute, ie 08 or 32 
m  return the minute, ie 8 or 32 
ss  returns the two-digit second, ie 04 or 54 
s  returns the second, ie 4 or 54 
hh:mm:ss  returns a typical time, ie 04:59:03 

End - Exits Your Program

Replace(YourString, StringToFind, StringToReplaceItWith)

StrReverse - Turns a String around

MsgBox StrConv("jonathan plaza", vbProperCase)

AppActivate ("Document - WordPad") Ex2. ("Useful Functions - Notepad")
SendKeys ("Hello from Visual Basic!")

Clipboard.SetText("My Text Clipboard Text")
MsgBox Clipboard.GetText

MsgBox FileLen("c:\autoexec.bat") - Get File Size

FileCopy("c:\oldfile.txt", "c:\newfile.txt") - Copy File

Kill("c:\oldfile.txt") - Delete File

Name "c:\oldfile.txt" as "c:\newfile.txt" - Move File

Public Function FileExists(FileName As String) As Boolean
    If Dir(FileName) = "" Then
        FileExists = False
    Else
        FileExists = True
    End If
End Function

Call SaveSetting(App.Title, "UserDetails", "Name", "Micky")

MsgBox GetSetting(App.Title, "UserDetails", "Name")

MkDir ("c:\vbworld\")

: - To Sim New Line

VbNewline

Public Function IsLeapYear(DateIn As Date) As Boolean

If IsDate("29/02/" & Format(DateIn, "yyyy")) = True Then
  IsLeapYear = True
End If

End Function

binteger = (txtBox1.Text - CInt(txtBox1.Text)) = 0 - Find Out Is Int

MsgBox Choose(2, "One", "Two", "Three")

Dim strTextArray() As String
strTextArray() = Split("hello:my:friend", ":")
MsgBox strTextArray(0)

Join - Oppiset of last

Static - Remembers String

x = IIf (ExpressionToEvaluate, TruePart, FalsePart)